
package org.xteam.pascal.parser.ast;

import org.xteam.parser.runtime.Span;

public class RecordCaseArm extends org.xteam.parser.runtime.AstNode {
	
	public org.xteam.parser.runtime.reflect.AstNodeType getNodeType() {
		return PascalAstPackage.INSTANCE.getRecordCaseArmType();
	}
	
	protected org.xteam.parser.runtime.AstList<Expression> values;
	protected FieldsAndVariant body;
	
	public RecordCaseArm(Span span, org.xteam.parser.runtime.AstList<Expression> values,FieldsAndVariant body) {
		super(span);
		this.values = values;
		this.body = body;
	}
	
	
	public org.xteam.parser.runtime.AstList<Expression> getValues() {
		return values;
	}
	
	public void setValues(org.xteam.parser.runtime.AstList<Expression> values) {
		this.values = values;
	}
	
	public FieldsAndVariant getBody() {
		return body;
	}
	
	public void setBody(FieldsAndVariant body) {
		this.body = body;
	}
	

	public void visit(IPascalVisitor visitor) {
		visitor.visitRecordCaseArm(this);
	}
}
